﻿'========================================================================
'功能:申請種類商業邏輯物件
'作者:andy
'日期: 2011/3/1
'========================================================================

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.Data.SqlClient
Imports System.Text
Imports System.Data
Namespace Telecom.BBL
    Public Class SiteBBL


        ''' <summary>
        ''' 取得廠區設定基本資料
        ''' </summary>
        ''' <returns>取得廠區設定基本資料</returns>
        ''' <remarks>取得廠區設定基本資料</remarks>

        Public Function GetAllSite(ByVal dbName As String) As DataTable
            Dim db1 As Telecom.DAO.SiteDAO = New Telecom.DAO.SiteDAO(dbName)
            Return db1.GetAllSite()
        End Function

        Public Function GetAllSite1(ByVal dbName As String) As DataTable
            Dim db1 As Telecom.DAO.SiteDAO = New Telecom.DAO.SiteDAO(dbName)
            Return db1.GetAllSite1()
        End Function
    End Class
End Namespace

